Exploring Aeronautics/NASA Exploring Aeronautics.iso/pc/source/tools.dxr/page2_4_button script with qtvr notify.ls

Text File | 1998-06-02 | 334 b | 17 lines

global gButtonManager, gRollManager, gMain

on mouseDown
  mMouseDown(gRollManager)
  if mCheckQTVRObjectNotify(gMain) = 0 then
    mButtonClicked(gButtonManager)
  end if
end

on mouseEnter me
  mProcessRollover(gRollManager, the spriteNum of me, 1)
end

on mouseLeave me
  mProcessRollover(gRollManager, the spriteNum of me, 0)
end